﻿Public Class FrmInfoMusculo

    Private Sub FrmInfoMusculo_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub

    Private Sub btnCancelar_Click(sender As Object, e As EventArgs) Handles btnCancelar.Click
        frmTransparente.Close()
    End Sub

    Private Sub btnModificar_Click(sender As Object, e As EventArgs) Handles btnModificar.Click
        Dim id As Integer = Integer.Parse(txtId.Text)
        Dim nombre As String = txtNombre.Text
        Dim irrigacion As String = txtIrrigacion.Text
        Dim origen As String = txtOrigen.Text
        Dim insercion As String = txtInsercion.Text
        Dim inervacion As String = txtInervacion.Text

        objGestor.modificarMusculo(id, nombre, irrigacion, origen, insercion, inervacion)

        ''Esto sirve para recargar el dataGrid de ejercicios para que aparezca el ejercicio registrado
        FrmPrincipal.paneForm.Controls.Clear()
        Dim frm As New Control
        frm = New frmConsultarMusculos
        frm.Dock = DockStyle.Fill
        FrmPrincipal.paneForm.Controls.Add(frm)
        
        frmTransparente.Close()
    End Sub
End Class
